home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / distortfx / flutterpixels < prev    next >
Text File  |  1999-06-15  |  1KB  |  49 lines
  1. Filter Factory Plugin Information:
  2.  
  3. FILENAME: FLUTTER.8BF
  4.  
  5. CATEGORY: 
  6. Ecosse
  7.  
  8. TITLE:    
  9. Flutter
  10.  
  11. COPYRIGHT:
  12. This version made for Paint Shop Pro tips web page at:
  13. http://www.webweaverxxi.com/psp40/
  14.  
  15. AUTHOR:   
  16. Copyright © A Blair 1997 contact alexb@cqm.co.uk for distribution permission
  17.  
  18. Map 0: [Map 0:]
  19. Map 1: [Map 1:]
  20. Map 2: [Map 2:]
  21. Map 3: [Map 3:]
  22.  
  23. Control 0: [up/down freq 1]
  24. Control 1: [up/down scale 1]
  25. Control 2: [up/down freq 2]
  26. Control 3: [up/down scale 2]
  27. Control 4: [left/right freq 1]
  28. Control 5: [left/right scale 1]
  29. Control 6: [left/right freq 2]
  30. Control 7: [left/right scale 2]
  31.  
  32. R=
  33.  
  34. put(y-scl(sin(x*1024/val(0,X/16,X/128)),-512,512,-val(1,0,Y/16),val(1,0,Y/16)),7),
  35. put(get(7)-scl(sin(x*1024/val(2,X/16,X/128)),-512,512,-val(3,0,Y/16),val(3,0,Y/16)),8),
  36. put(x-scl(sin(y*1024/val(4,Y/16,Y/128)),-512,512,-val(5,0,X/16),val(5,0,X/16)),0),
  37. put(get(0)-scl(sin(y*1024/val(6,Y/16,Y/128)),-512,512,-val(7,0,X/16),val(7,0,X/16)),1),
  38. src((X+get(1))%X,(Y+get(8))%Y,z)
  39.  
  40. G=
  41. src((X+get(1))%X,(Y+get(8))%Y,z)
  42.  
  43. B=
  44. src((X+get(1))%X,(Y+get(8))%Y,z)
  45.  
  46. A=
  47. a
  48.  
  49.